<?php
class App_Images
{
    var $error_no    = 0;
    var $error_msg   = '';
    var $images_dir  = 'uploads';
    var $data_dir    = ''; 
    var $type_maping = array(1 => 'image/gif', 2 => 'image/jpeg', 3 => 'image/png');
    var $allow = array('.gif','.jpg','.jpeg','.png','.flv');


    /**
     * 图片上传的处理函数
     *
     * @access      public
     * @param       array       upload       包含上传的图片文件信息的数组
     * @param       array       dir          文件要上传在$this->images_dir下的子目录名。如果为空图片放在则在$this->images_dir下以当月命名的目录下
     * @param       array       subDir       文件在 dir下的子目录名
     * @param       array       img_name     上传图片名称，为空则随机生成
     * @return      mix         如果成功则返回文件名，否则返回false
     */
    public function upload_image($upload, $dir = '', $subDir = '',  $img_name = '')
    {
        
        /* 没有指定目录默认为根目录images */
        if (empty($dir)){
            /* 创建当月目录 */
            $dir = date('Ym');
            $dir = _ROOT_DIR_.'/public/'.$this->images_dir . '/' . $dir . '/';
        }else{
            /* 创建目录 */
            $dir =  _ROOT_DIR_.'/public/'.$this->images_dir . '/' . $dir . '/';            
        }  
        
        if ($subDir) {
        	$dir .= $subDir.'/';
        }
    	if ($img_name){
                $img_name = $dir ."/". $img_name; // 将图片定位到正确地址
        }    
        /* 如果目标目录不存在，则创建它 */
        if (!file_exists($dir)){
            if (!App_Misc::make_dir($dir)){
                /* 创建目录失败 */
                $this->error_msg =  "创建目录失败！";
                return false;
            }
        }
        if (empty($img_name)){
            $img_name = $this->unique_name($dir);
            $img_name = $dir . $img_name . $this->get_filetype($upload['name']);
        }
    	if (!$this->check_img_type($upload['type'])){
            $this->error_msg = sprintf("不允许上传该类型!", $upload['name']);
            return false;
        }
        if (!in_array($this->get_filetype($upload['name']), $this->allow)) {
        	$this->error_msg = sprintf("不允许上传该类型啊!", $upload['name']);
            return false;
        }
        if ($this->move_file($upload, $img_name)){
            return str_replace(_ROOT_DIR_.'/public', '', $img_name);
        } else {
            $this->error_msg = sprintf("上传失败!", $upload['name']);
            return false;
        }
    }

    /**
     * 创建图片的缩略图
     *
     * @access  public
     * @param   string      $img    原始图片的路径
     * @param   int         $thumb_width  缩略图宽度
     * @param   int         $thumb_height 缩略图高度
     * @param   strint      $path         指定生成图片的目录名
     * @return  mix         如果成功返回缩略图的路径，失败则返回false
     */
    public function make_thumb($img, $thumb_width = 0, $thumb_height = 0, $path = '', $subDir = '', $imgname='',$bgcolor='')
    {

         $gd = $this->gd_version(); //获取 GD 版本。0 表示没有 GD 库，1 表示 GD 1.x，2 表示 GD 2.x
         if ($gd == 0){
             $this->error_msg = "请开启GD库！";
             return false;
         }
        /* 创建当月目录 */
        if (empty($path)){
            $dir = _ROOT_DIR_.'/public/'.$this->images_dir . '/' . date('Ym') . '/';
        } else {
            $dir = _ROOT_DIR_.'/public/'.$this->images_dir . '/' . $path . '/';
        }
        
        if ($subDir) {
        	$dir .= $subDir.'/';
        }

		/* 如果目标目录不存在，则创建它 */
        if (!file_exists($dir)){
            if (!App_Misc::make_dir($dir)){
                /* 创建目录失败 */
                $this->error_msg = sprintf("创建目录失败！", $dir);
                return false;
            }
        }
        if (empty($imgname)){
            $imgname = $this->unique_name($dir);
        }

        /* 检查缩略图宽度和高度是否合法 */
        if ($thumb_width == 0 && $thumb_height == 0){
            return str_replace(_ROOT_DIR_.'/public/', '', str_replace('\\', '/', realpath($img)));
        }

        /* 检查原始文件是否存在及获得原始文件的信息 */
        $org_info = @getimagesize($img);
        if (!$org_info){
            $this->error_msg = sprintf('原图片不存在！', $img);
            return false;
        }
        if (!$this->check_img_function($org_info[2])){
            $this->error_msg = sprintf('不支持此类型图片！', $this->type_maping[$org_info[2]]);
            return false;
        }

        $img_org = $this->img_resource($img, $org_info[2]);

        /* 原始图片以及缩略图的尺寸比例 */
        $scale_org      = $org_info[0] / $org_info[1];
        /* 处理只有缩略图宽和高有一个为0的情况，这时背景和缩略图一样大 */
        if ($thumb_width == 0){
            $thumb_width = $thumb_height * $scale_org;
        }
        if ($thumb_height == 0){
            $thumb_height = $thumb_width / $scale_org;
        }
        /* 创建缩略图的标志符 */
        if ($gd == 2){
            $img_thumb  = imagecreatetruecolor($thumb_width, $thumb_height);
        }
        else{
            $img_thumb  = imagecreate($thumb_width, $thumb_height);
        }
        $bgcolor='#FFFFFF';
        $bgcolor = trim($bgcolor,"#");
        sscanf($bgcolor, "%2x%2x%2x", $red, $green, $blue);
        $clr = imagecolorallocate($img_thumb, $red, $green, $blue);
        imagefilledrectangle($img_thumb, 0, 0, $thumb_width, $thumb_height, $clr);

        $lessen_width  = $thumb_width;
        $lessen_height  = $thumb_height ;

        $dst_x = ($thumb_width  - $lessen_width)  / 2;
        $dst_y = ($thumb_height - $lessen_height) / 2;
        
        if ($gd == 2){
            imagecopyresampled($img_thumb, $img_org, $dst_x, $dst_y, 0, 0, $lessen_width, $lessen_height, $org_info[0], $org_info[1]);
        }
        else{
            imagecopyresized($img_thumb, $img_org, $dst_x, $dst_y, 0, 0, $lessen_width, $lessen_height, $org_info[0], $org_info[1]);
        }

 		$filename = $imgname;

        if (function_exists('imagejpeg')){
            $filename.= '.jpg';
            imagejpeg($img_thumb, $dir . $filename);
        }
        elseif (function_exists('imagegif')){
            $filename.= '.gif';
            imagegif($img_thumb, $dir . $filename);
        }
        elseif (function_exists('imagepng')){
            $filename.= '.png';
            imagepng($img_thumb, $dir . $filename);
        }
        else{
            $this->error_msg = "创建失败";
            return false;
        }

        imagedestroy($img_thumb);
        imagedestroy($img_org);
        //确认文件是否生成
        if (file_exists($dir . $filename)){
            return str_replace(_ROOT_DIR_.'/public', '', $dir) . $filename;
        }
        else{
            $this->error_msg = '生成失败';
            return false;
        }
    }


    /**
     * 返回错误信息
     *
     * @return  string   错误信息
     */
    public function error_msg()
    {
        return $this->error_msg;
    }

    /*------------------------------------------------------ */
    //-- 工具函数
    /*------------------------------------------------------ */

    /**
     * 检查图片类型
     * @param   string  $img_type   图片类型
     * @return  bool
     */
    public function check_img_type($img_type)
    {
        return $img_type == 'image/pjpeg' ||
               $img_type == 'image/x-png' ||
               $img_type == 'image/png'   ||
               $img_type == 'image/gif'   ||
               $img_type == 'image/jpeg'  ||
               $img_type == 'application/octet-stream';
    }

    /**
     * 检查图片处理能力
     *
     * @access  public
     * @param   string  $img_type   图片类型
     * @return  void
     */
    public function check_img_function($img_type)
    {
        switch ($img_type)
        {
            case 'image/gif':
            case 1:

                if (PHP_VERSION >= '4.3'){
                    return function_exists('imagecreatefromgif');
                }
                else{
                    return (imagetypes() & IMG_GIF) > 0;
                }
            break;

            case 'image/pjpeg':
            case 'image/jpeg':
            case 2:
                if (PHP_VERSION >= '4.3'){
                    return function_exists('imagecreatefromjpeg');
                }
                else{
                    return (imagetypes() & IMG_JPG) > 0;
                }
            break;

            case 'image/x-png':
            case 'image/png':
            case 3:
                if (PHP_VERSION >= '4.3'){
                     return function_exists('imagecreatefrompng');
                }
                else{
                    return (imagetypes() & IMG_PNG) > 0;
                }
            break;

            default:
                return false;
        }
    }

    /**
     * 生成随机的数字串
     *
     * @author: weber liu
     * @return string
     */
    public function random_filename()
    {
        return time();
    }

    /**
     *  生成指定目录不重名的文件名
     *
     * @access  public
     * @param   string      $dir        要检查是否有同名文件的目录
     *
     * @return  string      文件名
     */
    public function unique_name($dir)
    {
        $filename = '';
        while (empty($filename))
        {
            $filename =$this->random_filename();
            if (file_exists($dir . $filename . '.jpg') || file_exists($dir . $filename . '.gif') || file_exists($dir . $filename . '.png')){
                $filename = '';
            }
        }

        return $filename;
    }

    /**
     *  返回文件后缀名，如‘.php’
     *
     * @access  public
     * @param
     *
     * @return  string      文件后缀名
     */
    public function get_filetype($path)
    {
        $pos = strrpos($path, '.');
        if ($pos !== false){
            return strtolower(substr($path, $pos));
        }
        else{
            return '';
        }
    }

     /**
     * 根据来源文件的文件类型创建一个图像操作的标识符
     *
     * @access  public
     * @param   string      $img_file   图片文件的路径
     * @param   string      $mime_type  图片文件的文件类型
     * @return  resource    如果成功则返回图像操作标志符，反之则返回错误代码
     */
    public function img_resource($img_file, $mime_type)
    {
        switch ($mime_type)
        {
            case 1:
            case 'image/gif':
                $res = imagecreatefromgif($img_file);
                break;

            case 2:
            case 'image/pjpeg':
            case 'image/jpeg':
                $res = imagecreatefromjpeg($img_file);
                break;

            case 3:
            case 'image/x-png':
            case 'image/png':
                $res = imagecreatefrompng($img_file);
                break;

            default:
                return false;
        }

        return $res;
    }

    /**
     * 获得服务器上的 GD 版本
     *
     * @access      public
     * @return      int         可能的值为0，1，2
     */
    public function gd_version()
    {
        static $version = -1;

        if ($version >= 0) {
            return $version;
        }

        if (!extension_loaded('gd')){
            $version = 0;
        }
        else{
            // 尝试使用gd_info函数
            if (PHP_VERSION >= '4.3'){
                if (function_exists('gd_info')){
                    $ver_info = gd_info();
                    preg_match('/\d/', $ver_info['GD Version'], $match);
                    $version = $match[0];
                }
                else{
                    if (function_exists('imagecreatetruecolor')){
                        $version = 2;
                    }
                    elseif (function_exists('imagecreate')){
                        $version = 1;
                    }
                }
            }
            else{
                if (preg_match('/phpinfo/', ini_get('disable_functions'))){
                    /* 如果phpinfo被禁用，无法确定gd版本 */
                    $version = 1;
                }
                else{
                  // 使用phpinfo函数
                   ob_start();
                   phpinfo(8);
                   $info = ob_get_contents();
                   ob_end_clean();
                   $info = stristr($info, 'gd version');
                   preg_match('/\d/', $info, $match);
                   $version = $match[0];
                }
             }
        }

        return $version;
     }


    /**
     *
     *
     * @access  public
     * @param
     *
     * @return void
     */
    public function move_file($upload, $target)
    {
        if (isset($upload['error']) && $upload['error'] > 0){
            return false;
        }
        if (!App_Misc::move_upload_file($upload['tmp_name'], $target)){
            return false;
        }

        return true;
    }

}
